
{mfdeclre.i}
{mf1.i}

define            variable run-pgm    as   character no-undo.
define            variable v-key      as   character no-undo.

v-key = global_user_site.
{gpbrparm.i &browse=adbr001.p &parm=c-param1 &val=v-key} 

run-pgm = "adbr001.p".
{gprun.i ""gpcn200.w"" "(input run-pgm)"}


return.
